home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / com_and4.zip / VOICEOFF.CMD < prev    next >
OS/2 REXX Batch file  |  1990-03-12  |  1KB  |  38 lines
  1.    S29 = "VoiceOFF ver 1.0    " ; 20 chars long
  2.    LEGEND S29
  3. ;
  4. ; ----- VoiceOFF Scripted interface to VOICE.EXE: Turn VOICE OFF
  5. ;
  6. ;    This script may be manually invoked, or automatically at the
  7. ;    termination of COM-AND (via SET EXIT <scriptname>.  It also
  8. ;    may be FCALLed.
  9. ;
  10. ;    R.McG; 3/90, Chicago
  11. ; ----------------------------------------------------------------
  12. ; Usages:
  13. ;      S29 -----> Legend line
  14. ;
  15. ; -----------------------------------------------------------------------
  16. ;    NOTE: This script terminates the previously loaded overlay
  17. ; -----------------------------------------------------------------------
  18. ;
  19. ;    Set-up the overlay (our interface to VOICE.EXE).
  20. ;
  21.    IF FIND "_OVER" "talker."            ; If overlay loaded is TALKER
  22.       SCALL 9                ; Entry addr 9 -> Close voice driver
  23.       MESS "!Voice driver off!"         ; Inform...
  24.       ENDIF                ; Clears VOICE.EXE if loaded by script
  25.    OVERLAY CLEAR            ; Clear any overlay
  26. ;
  27. ;    Now, test if there's an EXIT SCRIPT
  28. ;
  29.    IF NULL "_EXIT"                      ; If no exit script,
  30.       BYE                ; ..  terminate
  31.       ENDIF
  32.    SET EXIT ""                          ; Clear pending exit script
  33. ;
  34. ;    Otherwise, manually invoked
  35. ;
  36.    IF FCALLED FRET            ; Return if called
  37.    EXIT                 ; Else stop script
  38.